Program main
    Implicit none
    write(*,*) "Hello World!"
    End program main


FUNCTION
function